12 PRINT "I ALWAYS FEEL THE DATE FUNCTION IN THE MAIN FRAME COMPUTERS IS NICE TO HAVE WITH MY APPLE. APPLE PASCAL HAS THIS FUNCTION BUILT-IN AND ALLOW THE USER TO SET THE DATE MANUALLY WHEN HE/SHE WANTS.": PRINT
20 PRINT "NOW APPLE COMPUTER INTRODUCES THE NEW DOS CALLED PRODOS AND HAVE THE DATE-TIMEFUNCTION BUILD-IN, BUT IT REQUIRES A THUNDERCLOCK CARD IN SLOT 4 IN ORDER TO USE THIS NICE FUNCTION. DO I LOSS THIS IF I DO NOT HAVE A CLOCK CARD?"
25 PRINT : PRINT "AFTER READING THE NIBBLE'S APRIL ISSUE, I AM SURPRISED TO KNOW THAT THE DATE ANDTIME CAN BE SET WITHOUT A CLOCK CARD. BUT THE MACHINE LANGUAGE PROGRAM IS 626 BYTES LONG. DO I NEED ALL THIS CODES": PRINT
27 GOSUB 200
30 PRINT "AFTER SITTING IN FRONT OF MY COMPUTER FOR A WHILE, I KNOW THERE IS A WAY TO SET THE DATE/TIME WITHOUT A CLOCK CARD, AND CAN BE DONE IN BASIC. ALL I NEED IS TO POKE THE DATE/TIME VALUES TO THE": PRINT
40 PRINT "ADDRESSES RESERVED FOR THE DATE AND TIMETHE ADRESSES ARE $BF90-$BF93. NOW ALL I HAVE TO DO IS POKE THESE VALUES TO THEADDRESSES. HOURS AND MINUTES OCCUPY TWOBYTES, SO IT IS NOT PROBLEM TO POKE THE HOURS AND MINUTES DIRECTLY TO THES
45 PRINT "ADDRESSES. BUT THE DATE HAS (YY/MM/DD FORMAT AND OCCUPIES TWO BYTES. TO POKE THREE VALUES INTO TWO BYTES, I HAVE TO FIND A WAY TO SEPARTE THE MONTH INTO TWOPARTS, THE UPPER AND LOWER MONTH.": PRINT
47 GOSUB 200
50 PRINT "I FIND OUT ONLY IF THE MONTH IS GREATER THAN 7 WILL AFFECT THE UPPER MONTH PART SO I ONLY HAVE TO TEST THE MONTH TO SEE IF IT IS GREATER THAN SEVEN. NOW ALL I HAVE TO DO IS POKE THE VALUES TO THE ADDRESSES. (HOW EASY IT IS !)"
54 PRINT
55 PRINT "AFTER WRITING THE DATE/TIME PROGRAM, I WROTE TWO MORE PROGRAMS TO CHECK THE MACHINE ID AND THE SLOT ASSIGNMENT. THEADDRESSES FOR THESE TWO ARE $BF98 AND $BF99."
59 PRINT
60 PRINT "I HOPE THESE PROGRAMS HELP YOU AND THE MEMBERS OF THE LOGIC."
61 PRINT : PRINT : PRINT " MICHAEL LEE"
62 GOSUB 200
199 END
200 VTAB 24: PRINT "PRESS A KEY TO CONTINUE ...";: GET A$: PRINT : HOME : RETURN